Inference at * 
Iof proof for Lemma bnot thru band:


  p,q:. ((p  q)) = ((p) (q)) 

latex

 by InteriorProof ((((UnivCD) 
CollapseTHENM (BoolEval))) 
CollapseTHEN ((Auto_aux (first_nat 
CollapseTHEN ((Aut1:n) ((first_nat 1:n),(first_nat 3:n)) (first_tok :t) inil_term))) 

latex

C.

Definitions	t  T
Lemmas	bool wf, btrue wf, bfalse wf